|
Inventor VBA : Zusammengehörige Bauteile/Baugruppe zu Zeichnung
freak-tom am 20.12.2006 um 11:49 Uhr (0)
Hallo Reinhard,genau!!! Ich lade das Modell aus Compass und will dann die Zeichnung dazu öffnen.Normaler Weg:im Inventor auf Compass Wechseln zu Compassim Compass die Zeichnung suchenund öffnen! schön wäre es, wenn ich ein Makro hätte, das automatisch beim ausführen die Zeichnung öffnet!Also zum Beispiel könnte das so gehen!Wert von Iproperty Dokumentennummer auslesen,diese Dokumentennummer im Compass mit dem Typ dw suchen und diesen öffnen! das iproperty dokumentennummer ist in der Zeichnung das gleiche w ...
|
| In das Form Inventor VBA wechseln |
|
Inventor VBA : Zusammengehörige Bauteile/Baugruppe zu Zeichnung
freak-tom am 05.12.2006 um 16:48 Uhr (0)
Hallo Leute habe das gleiche Prob allerdings arbeite ich mit Compass Productstream 2005 und möchte aus dem Bauteil die dazu gehörige Zeichnung öffnen gibt es hier auch ein Makro?
|
| In das Form Inventor VBA wechseln |
|
Inventor VBA : Alle Farben einer Zeichnung verändern
freak-tom am 28.06.2007 um 12:45 Uhr (0)
Hallo Forumuser,kann man bie vorhandenen Layern die Farbe ändern wenn der Name bekannt ist?MfGThomas
|
| In das Form Inventor VBA wechseln |
|
Inventor VBA : Alle Farben einer Zeichnung verändern
freak-tom am 12.06.2007 um 15:29 Uhr (0)
Hallo Forumuser,kann man im Inventor per VBA alle Layerfarben auf Schwarz setzen, und alle Textstile ebenfalls auf Schwarz? Egal wie die Layer bzw. die Textstile heißen.Das wäre echt toll, da wir im Moment lauter Dunkelblaue Linien (Inventor Standard) haben und dies z.B. beim erstellen einer DXF Datei ziemlich unpraktisch ist! Hier geht es nur um Altdaten, neue Zeichnungen werden schon mit schwarzen Strichen gezeichnet!MfGThomas
|
| In das Form Inventor VBA wechseln |
|
Inventor VBA : Dynamischer pfad
freak-tom am 21.12.2006 um 09:43 Uhr (0)
Hallo Forumuser,habe folgendes Problem!Ich habe ein paar Makros programmiert, und diese Makros öffnen eine Zeichnung aus einem pfad! Geht auch so weit ganz gut! Allerdings habe ich das Problem, das wir nicht nur einen Standort haber sondern mehrere und bei jedem Standort ist der Pfad anders! Kann ich das irgendwie Programmieren das ich die Makros nicht für jeden standort anpassen muss!Also z.B. wenn der Pfad nicht vorhanden ist nehme den anderen pfadoder kann ich aus dem Inventorprojekt einen Pfad auslesen ...
|
| In das Form Inventor VBA wechseln |
|
Inventor VBA : Zeichnungskopf austauschen
freak-tom am 16.09.2009 um 17:57 Uhr (0)
Hallo Muelb,vielleicht als Hilfe mein fertiges Macro, das funktioniert!Code:Public Sub Schriftfeld_ersetzen() MsgBox Environ$("Inventor") If ThisApplication.ActiveDocument Is Nothing Then MsgBox "No Document open", 16, "Error" Exit Sub End If If Not ThisApplication.ActiveDocument.DocumentType = kDrawingDocumentObject Then MsgBox "No Drawing", 16, "Error" Exit Sub End If Dim oApp As Application Set oApp = ThisApplication Dim i As Long Dim oDrawDoc As DrawingDocument Set oDrawDoc = ...
|
| In das Form Inventor VBA wechseln |